El software de análisis de estructuras RFEM 6 es la base de un sistema de software modular. El programa principal RFEM 6 se usa para definir estructuras, materiales y cargas de sistemas estructurales planos y espaciales compuestos por placas, muros, láminas y barras. El programa también le permite crear estructuras mixtas, así como modelar elementos sólidos y de contacto.
RSTAB 9 es un software potente de análisis y dimensionamiento en 3D de estructuras de vigas, pórticos o cerchas, que refleja el estado de la técnica actual y ayuda a los ingenieros y consultores de estructuras a cumplir con los requisitos de la ingeniería de estructuras moderna.
¿Está a menudo ocupado con el cálculo de secciones durante demasiado tiempo? Dlubal Software y el programa independiente RSECTION facilitan su trabajo al determinar y realizar un análisis de tensiones para varias secciones.
¿Siempre sabe de dónde viene el viento? ¡Desde la dirección de la innovación, por supuesto! Con RWIND 2 a su lado tiene un programa que utiliza un túnel de viento digital para la simulación numérica de los flujos de viento. El programa simula estos flujos alrededor de cualquier geometría de construcción y determina las cargas de viento en las superficies.
¿Está buscando una vista general de las zonas de carga de nieve, zonas de viento y zonas de sísmicas? Entonces está en el lugar correcto. Utilice la herramienta <i>Geo-Zone</i> para la determinación rápida de las cargas de nieve, velocidades de viento y zonas sísmicas según el Eurocódigo, CTE, ASCE 7-16 y otras normas internacionales.
¿Le gustaría probar la potencia de los programas de Dlubal Software? ¡Es su oportunidad! Con la versión completa gratuita de 90 días, puede probar todos nuestros programas por completo.
La fricción es una no linealidad y, por lo tanto, solo se puede modificar a través de la interfaz con la articulación de la barra.
Para esto, primero es necesario crear la articulación de la barra, si aún no está disponible. Luego, la interfaz IMemberHinge se lleva a la articulación de la barra y luego a la no linealidad (aquí IFriction ). Luego, puede usar los métodos GetData y SetData para modificar los datos (aquí Friction):
Sub SetMemberHingeFriction () Dim model As RFEM5.model Set model = GetObject(, "RFEM5.Model") model.GetApplication.LockLicense On Error GoTo e Dim data As IModelData Set data = model.GetModelDataAtenuar la articulación (0 a 0) como RFEM5. hinge(0).No = 1 hinge(0).RotationalConstantX = 1 hinge(0).RotationalConstantY = 2 hinge(0).RotationalConstantZ = 3 hinge(0).TranslationalConstantX = 4 hinge(0).TranslationalConstantY = 5 hinge(0).TranslationalConstantZ = 6 hinge(0).Comment = "Member Hinge 1" hinge(0).TranslationalNonlinearityX = FrictionAType data.PrepareModification data.SetMemberHinges hinge data.FinishModification ' get interface for member hinge Dim imemhing As IMemberHinge Set imemhing = data.GetMemberHinge(1, AtNo) 'obtener interfaz para "fricción" no lineal Dim iFric As IFriction Set iFric = imemhing.GetNonlinearity(AlongAxisX) ' get friction data Dim fric As Friction fric = iFric.GetData fric.Coefficient1 = 0.3 ' set friction data data.PrepareModification iFric.SetData fric data.FinishModification e: If Err.Number <> 0 Then MsgBox Err.description, , Err.Source Set data = Nothing model.GetApplication.UnlockLicense Set model = NothingEnd Sub
En el caso de la fricción Vy + Vz, se usa el "Coefficient2" para establecer el segundo coeficiente. La constante elástica en el cuadro de diálogo "Fricción" está controlada por el muelle traslacional de la articulación en el extremo de la barra. En este caso particular, se trata de TranslationalConstantX para la dirección x (ver imagen 01).
Para sólo calcular ciertos casos de carga, combinaciones de carga o combinaciones de resultados, justo como el comando "Para calcular...." (ver figura 01), puede usar el método "CalculateBarch" de la interfaz ICalculation. Al transferir datos, el método espera un campo con el tipo de carga. La carga incluye el número de la carga, y el tipo (p. ej. combinación de carga):
Sub batch_test () ' get interface from the opened model and lock the licence/program Dim iModel As RFEM5.IModel3 Set iModel = GetObject(, "RFEM5.Model") iModel.GetApplication.LockLicense On Error GoTo e ' get interface for calculationv Dim iCalc As ICalculation2 Set iCalc = iModel.GetCalculation ' create array with loading types Dim loadings(3) As Loading loadings(0).no = 1 loadings(0).Type = LoadCaseType loadings(1).no = 4 loadings(1).Type = LoadCaseType loadings(2).no = 4 loadings(2).Type = LoadCombinationType ' calculate all loadings from the array at once iCalc.CalculateBatch loadingse: If Err.Number <> 0 Then MsgBox Err.description`` Err.Source Set iModelData = Nothing iModel.GetApplication.UnlockLicense iModel.GetApplication.UnlockLicenseEnd Sub